home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / c1.zip / RENAME.C < prev    next >
Text File  |  1987-06-18  |  512b  |  20 lines
  1.  
  2. /************************************************************
  3.  *          IBM PC "C" Bulletin Board                       *
  4.  *          Tulsa, OK  918-664-8737                         *
  5.  ************************************************************/
  6.  
  7.  
  8. rename(old, new)
  9. char *old, *new;
  10. {
  11.         char buff[60];
  12.  
  13.         fcbinit(new,buff);
  14.         bdos(19,buff);
  15.         fcbinit(old,buff);
  16.         fcbinit(new,buff+16);
  17.         bdos(23,buff);
  18. }
  19.  
  20.